object PreviewFrm: TPreviewFrm Left = 255 Top = 153 Width = 534 Height = 453 Caption = 'Pr'#233'visualiser l'#39'impression' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] KeyPreview = True OldCreateOrder = True Position = poDefault ShowHint = True OnCreate = FormCreate OnDestroy = FormDestroy OnKeyDown = FormKeyDown OnMouseWheel = FormMouseWheel OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Sheet: TScrollCanvas Left = 0 Top = 26 Width = 526 Height = 393 HorzScrollBar.Tracking = True VertScrollBar.Tracking = True Align = alClient Color = 14281433 ParentColor = False TabOrder = 0 DragView = False object shShadowR: TShape Left = 385 Top = 28 Width = 3 Height = 359 Brush.Color = clGray Pen.Color = clGray end object shShadowB: TShape Left = 84 Top = 384 Width = 301 Height = 3 Brush.Color = clGray Pen.Color = clGray end object pnPaper: TPanel Left = 80 Top = 24 Width = 305 Height = 361 Cursor = 2 BevelOuter = bvNone BorderWidth = 8 BorderStyle = bsSingle Color = clWhite Ctl3D = False ParentCtl3D = False TabOrder = 0 OnMouseDown = PreviewMouseDown object imgPreview: TImage Left = 8 Top = 8 Width = 287 Height = 343 Cursor = 2 Align = alClient Stretch = True Transparent = True OnMouseDown = PreviewMouseDown end end end object TBDock1: TTBDock Left = 0 Top = 0 Width = 526 Height = 26 object Toolbar: TTBToolbar Left = 0 Top = 0 Align = alTop DockMode = dmCannotFloatOrChangeDocks DragHandleStyle = dhNone FullSize = True Images = Images.MainHot ShowCaption = False TabOrder = 0 object CloseBtn: TTBItem Caption = '&Fermer' OnClick = CloseBtnClick end object TBSeparatorItem3: TTBSeparatorItem end object PrintBtn: TTBItem Caption = '&Imprimer' DisplayMode = nbdmImageAndText Hint = 'Imprimer' ImageIndex = 21 ShortCut = 16464 OnClick = PrintBtnClick end object SetupBtn: TTBItem Caption = '&Configuration' DisplayMode = nbdmImageAndText Hint = 'Mise en page' ImageIndex = 42 OnClick = SetupBtnClick end object TBSeparatorItem2: TTBSeparatorItem end object ZoomInBtn: TTBItem Tag = 1 Hint = 'Agrandir' ImageIndex = 67 OnClick = ZoomBtnClick end object ZoomOutBtn: TTBItem Tag = -1 Hint = 'R'#233'duire' ImageIndex = 68 OnClick = ZoomBtnClick end object TBControlItem2: TTBControlItem Control = ZoomLabel end object TBSeparatorItem1: TTBSeparatorItem end object TBItem7: TTBItem Enabled = False ImageIndex = 75 end object TBControlItem1: TTBControlItem Control = PageLabel end object TBItem5: TTBItem Enabled = False ImageIndex = 75 end object FirstPageBtn: TTBItem Hint = 'Premi'#232're page' ImageIndex = 69 OnClick = FirstPageBtnClick end object PrevPageBtn: TTBItem Hint = 'Page pr'#233'c'#233'dente' ImageIndex = 70 OnClick = PrevPageBtnClick end object NextPageBtn: TTBItem Hint = 'Page suivante' ImageIndex = 71 OnClick = NextPageBtnClick end object LastPageBtn: TTBItem Hint = 'Derni'#232're page' ImageIndex = 72 OnClick = LastPageBtnClick end object PageLabel: TLabel Left = 262 Top = 4 Width = 11 Height = 13 Caption = '%' end object ZoomLabel: TLabel Left = 198 Top = 4 Width = 35 Height = 13 Caption = ' 100%' end end end object PrintDialog: TPrintDialog Options = [poPrintToFile, poPageNums] Left = 16 Top = 352 end object PrinterSetupDialog: TPrinterSetupDialog Left = 48 Top = 352 end end